For Each Long[] (gb)

Dim hLongArray As Long[]
Dim aLong As Long
For Each aLong In hLongArray
  ...
Next

Enumera ogni elemento memorizzato nell'array.